300 REM ECHTZEITUHR LESEN
310 CIA=56328:REM ANFANGSADRESSE VON CIA 1
320 HH=PEEK(CIA+3):ZS=PEEK(CIA)
330 MM=PEEK(CIA+2)
340 SS=PEEK(CIA+1)
350 TM=0: IF HH>128 THEN TM=1:HH=HH-128:REM NACHMITTAGS
360 HH=INT(HH/16)*10+(HH AND 15)
370 IF TM=1 AND HH<>12 THEN HH=HH+12
375 IF TM=0 AND HH=12 THEN HH=0
380 MM=INT(MM/16)*10+(MM AND 15)
390 SS=INT(SS/16)*10+(SS AND 15)
400 PRINT"[147]"HH":"MM":"SS
410 GOTO320